﻿Imports DAO
Imports DTO


Public Class LoaiPhongBus
    Public Function LayDanhSach() As IList
        'Kiem tra business rule neu co
        Dim lpDao As New LoaiPhongDAO()
        Dim ds As IList
        ds = lpDao.LayDanhSach()
        Return ds
    End Function
    Public Function ThemLoaiPhong(ByVal lpDto As LoaiPhongDto) As Integer

        Dim lpDao As New LoaiPhongDAO()
        lpDao.ThemLoaiPhong(lpDto)

    End Function
    Public Function CapNhatLoaiPhong(ByVal lpDto As LoaiPhongDto) As Integer

        Dim lpDao As New LoaiPhongDAO()
        lpDao.CapNhatLoaiPhong(lpDto)

    End Function
End Class
